; pascal void MediaTimeToSampleNum(Media theMedia, TimeValue time, long *sampleNum, TimeValue *sampleTime, TimeValue *sampleDuration)
;
IF ¨ GENERATINGCFM THEN
Macro
_MediaTimeToSampleNum
moveq #123,D0
dc.w $AAAA
EndM
ELSE
IMPORT_CFM_FUNCTION MediaTimeToSampleNum
ENDIF
;
; pascal OSErr AddMediaSample(Media theMedia, Handle dataIn, long inOffset, unsigned long size, TimeValue durationPerSample, SampleDescriptionHandle sampleDescriptionH, long numberOfSamples, short sampleFlags, TimeValue *sampleTime)
;
IF ¨ GENERATINGCFM THEN
Macro
_AddMediaSample
moveq #124,D0
dc.w $AAAA
EndM
ELSE
IMPORT_CFM_FUNCTION AddMediaSample
ENDIF
;
; pascal OSErr AddMediaSampleReference(Media theMedia, long dataOffset, unsigned long size, TimeValue durationPerSample, SampleDescriptionHandle sampleDescriptionH, long numberOfSamples, short sampleFlags, TimeValue *sampleTime)
; pascal OSErr GetMediaSample(Media theMedia, Handle dataOut, long maxSizeToGrow, long *size, TimeValue time, TimeValue *sampleTime, TimeValue *durationPerSample, SampleDescriptionHandle sampleDescriptionH, long *sampleDescriptionIndex, long maxNumberOfSamples, long *numberOfSamples, short *sampleFlags)
;
IF ¨ GENERATINGCFM THEN
Macro
_GetMediaSample
moveq #126,D0
dc.w $AAAA
EndM
ELSE
IMPORT_CFM_FUNCTION GetMediaSample
ENDIF
;
; pascal OSErr GetMediaSampleReference(Media theMedia, long *dataOffset, long *size, TimeValue time, TimeValue *sampleTime, TimeValue *durationPerSample, SampleDescriptionHandle sampleDescriptionH, long *sampleDescriptionIndex, long maxNumberOfSamples, long *numberOfSamples, short *sampleFlags)
;
IF ¨ GENERATINGCFM THEN
Macro
_GetMediaSampleReference
moveq #127,D0
dc.w $AAAA
EndM
ELSE
IMPORT_CFM_FUNCTION GetMediaSampleReference
ENDIF
;
; pascal OSErr GetMediaSampleReferences(Media theMedia, TimeValue time, TimeValue *sampleTime, SampleDescriptionHandle sampleDescriptionH, long *sampleDescriptionIndex, long maxNumberOfEntries, long *actualNumberofEntries, SampleReferencePtr sampleRefs)
;
IF ¨ GENERATINGCFM THEN
Macro
_GetMediaSampleReferences
move.w #$0235,D0
dc.w $AAAA
EndM
ELSE
IMPORT_CFM_FUNCTION GetMediaSampleReferences
ENDIF
;
; pascal OSErr SetMediaPreferredChunkSize(Media theMedia, long maxChunkSize)
;
IF ¨ GENERATINGCFM THEN
Macro
_SetMediaPreferredChunkSize
move.w #$01F8,D0
dc.w $AAAA
EndM
ELSE
IMPORT_CFM_FUNCTION SetMediaPreferredChunkSize
ENDIF
;
; pascal OSErr GetMediaPreferredChunkSize(Media theMedia, long *maxChunkSize)
;
IF ¨ GENERATINGCFM THEN
Macro
_GetMediaPreferredChunkSize
move.w #$01F9,D0
dc.w $AAAA
EndM
ELSE
IMPORT_CFM_FUNCTION GetMediaPreferredChunkSize
ENDIF
;
; pascal OSErr SetMediaShadowSync(Media theMedia, long frameDiffSampleNum, long syncSampleNum)
;
IF ¨ GENERATINGCFM THEN
Macro
_SetMediaShadowSync
move.w #$0121,D0
dc.w $AAAA
EndM
ELSE
IMPORT_CFM_FUNCTION SetMediaShadowSync
ENDIF
;
; pascal OSErr GetMediaShadowSync(Media theMedia, long frameDiffSampleNum, long *syncSampleNum)
; pascal ComponentResult GetDisplayedSampleNumber(MediaHandler mh, long *sampleNum)
;
IF ¨ GENERATINGCFM THEN
Macro
_GetDisplayedSampleNumber
move.l #$00070107,-(sp)
moveq #0,D0
dc.w $A82A
EndM
ELSE
IMPORT_CFM_FUNCTION GetDisplayedSampleNumber
ENDIF
;
;************************
;* Text Media routines
;*************************
;
; Return displayFlags for TextProc
txtProcDefaultDisplay EQU 0 ; Use the media's default
txtProcDontDisplay EQU 1 ; Don't display the text
txtProcDoDisplay EQU 2 ; Do display the text
;
; pascal ComponentResult SetTextProc(MediaHandler mh, TextMediaUPP TextProc, long refcon)
;
IF ¨ GENERATINGCFM THEN
Macro
_SetTextProc
move.l #$00080101,-(sp)
moveq #0,D0
dc.w $A82A
EndM
ELSE
IMPORT_CFM_FUNCTION SetTextProc
ENDIF
;
; pascal ComponentResult AddTextSample(MediaHandler mh, Ptr text, unsigned long size, short fontNumber, short fontSize, Style textFace, RGBColor *textColor, RGBColor *backColor, short textJustification, Rect *textBox, long displayFlags, TimeValue scrollDelay, short hiliteStart, short hiliteEnd, RGBColor *rgbHiliteColor, TimeValue duration, TimeValue *sampleTime)
;
IF ¨ GENERATINGCFM THEN
Macro
_AddTextSample
move.l #$00340102,-(sp)
moveq #0,D0
dc.w $A82A
EndM
ELSE
IMPORT_CFM_FUNCTION AddTextSample
ENDIF
;
; pascal ComponentResult AddTESample(MediaHandler mh, TEHandle hTE, RGBColor *backColor, short textJustification, Rect *textBox, long displayFlags, TimeValue scrollDelay, short hiliteStart, short hiliteEnd, RGBColor *rgbHiliteColor, TimeValue duration, TimeValue *sampleTime)
;
IF ¨ GENERATINGCFM THEN
Macro
_AddTESample
move.l #$00260103,-(sp)
moveq #0,D0
dc.w $A82A
EndM
ELSE
IMPORT_CFM_FUNCTION AddTESample
ENDIF
;
; pascal ComponentResult AddHiliteSample(MediaHandler mh, short hiliteStart, short hiliteEnd, RGBColor *rgbHiliteColor, TimeValue duration, TimeValue *sampleTime)
;
IF ¨ GENERATINGCFM THEN
Macro
_AddHiliteSample
move.l #$00100104,-(sp)
moveq #0,D0
dc.w $A82A
EndM
ELSE
IMPORT_CFM_FUNCTION AddHiliteSample
ENDIF
findTextEdgeOK EQU $01 ; Okay to find text at specified sample time
findTextCaseSensitive EQU $02 ; Case sensitive search
findTextReverseSearch EQU $04 ; Search from sampleTime backwards
findTextWrapAround EQU $08 ; Wrap search when beginning or end of movie is hit
findTextUseOffset EQU $10 ; Begin search at the given character offset into sample rather than edge
;
; pascal ComponentResult FindNextText(MediaHandler mh, Ptr text, long size, short findFlags, TimeValue startTime, TimeValue *foundTime, TimeValue *foundDuration, long *offset)
;
IF ¨ GENERATINGCFM THEN
Macro
_FindNextText
move.l #$001A0105,-(sp)
moveq #0,D0
dc.w $A82A
EndM
ELSE
IMPORT_CFM_FUNCTION FindNextText
ENDIF
;
; pascal ComponentResult HiliteTextSample(MediaHandler mh, TimeValue sampleTime, short hiliteStart, short hiliteEnd, RGBColor *rgbHiliteColor)